inherited FCadEtapaDetalhe: TFCadEtapaDetalhe
  Left = 394
  Top = 313
  Width = 1085
  Height = 602
  Caption = 'Detalhamento de etapas para infra-estrutura'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object lbl1: TLabel [4]
    Left = 152
    Top = 128
    Width = 175
    Height = 13
    Caption = 'ETPDETDATAPREVISTATERMINO'
    FocusControl = dbedt1
  end
  object lbl2: TLabel [5]
    Left = 16
    Top = 128
    Width = 154
    Height = 13
    Caption = 'ETPDETDATAPREVISTAINICO'
    FocusControl = dbedt2
  end
  object lbl3: TLabel [6]
    Left = 936
    Top = 120
    Width = 122
    Height = 13
    Caption = 'ETPDETDATATERMINO'
    FocusControl = dbedt3
  end
  object lbl4: TLabel [7]
    Left = 808
    Top = 120
    Width = 104
    Height = 13
    Caption = 'ETPDETDATAINICIO'
    FocusControl = dbedt4
  end
  object lbl7: TLabel [8]
    Left = 16
    Top = 80
    Width = 54
    Height = 13
    Caption = 'ETPDETID'
    FocusControl = dbedt7
  end
  object lbl8: TLabel [9]
    Left = 160
    Top = 80
    Width = 105
    Height = 13
    Caption = 'ETPDETDESCRICAO'
    FocusControl = dbedt8
  end
  object lbl9: TLabel [10]
    Left = 576
    Top = 40
    Width = 32
    Height = 13
    Caption = 'ETPID'
    FocusControl = dbedt9
  end
  object lbl10: TLabel [11]
    Left = 16
    Top = 40
    Width = 72
    Height = 13
    Caption = 'EMPREENDID'
    FocusControl = dbedt10
  end
  inherited BtCancelar: TBitBtn
    Left = 906
  end
  inherited BtGravar: TBitBtn
    Left = 825
  end
  inherited BtExcluir: TBitBtn
    Left = 986
  end
  object dbedt1: TDBEdit [15]
    Left = 152
    Top = 144
    Width = 120
    Height = 21
    DataField = 'ETPDETDATAPREVISTATERMINO'
    DataSource = ds1
    TabOrder = 3
  end
  object dbedt2: TDBEdit [16]
    Left = 16
    Top = 144
    Width = 120
    Height = 21
    DataField = 'ETPDETDATAPREVISTAINICO'
    DataSource = ds1
    TabOrder = 4
  end
  object dbedt3: TDBEdit [17]
    Left = 936
    Top = 136
    Width = 120
    Height = 21
    Hint = 'Campos em azul claro, n'#227'o podem ser editados de forma direta.'
    Color = clSkyBlue
    DataField = 'ETPDETDATATERMINO'
    DataSource = ds1
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 5
  end
  object dbedt4: TDBEdit [18]
    Left = 808
    Top = 136
    Width = 120
    Height = 21
    Hint = 'Campos em azul claro, n'#227'o podem ser editados de forma direta.'
    Color = clSkyBlue
    DataField = 'ETPDETDATAINICIO'
    DataSource = ds1
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 6
  end
  object dbedt7: TDBEdit [19]
    Left = 16
    Top = 96
    Width = 134
    Height = 21
    Hint = 'Campos em azul claro, n'#227'o podem ser editados de forma direta.'
    Color = clSkyBlue
    DataField = 'ETPDETID'
    DataSource = ds1
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 7
  end
  object dbedt8: TDBEdit [20]
    Left = 160
    Top = 96
    Width = 897
    Height = 21
    DataField = 'ETPDETDESCRICAO'
    DataSource = ds1
    TabOrder = 8
  end
  object dbedt9: TDBEdit [21]
    Left = 576
    Top = 56
    Width = 134
    Height = 21
    Hint = 'Campos em azul claro, n'#227'o podem ser editados de forma direta.'
    Color = clSkyBlue
    DataField = 'ETPID'
    DataSource = ds1
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 9
  end
  object dbedt10: TDBEdit [22]
    Left = 16
    Top = 56
    Width = 134
    Height = 21
    Hint = 'Campos em azul claro, n'#227'o podem ser editados de forma direta.'
    Color = clSkyBlue
    DataField = 'EMPREENDID'
    DataSource = ds1
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 10
  end
  object dbgrdEtapaDetalheItem: TDBGrid [23]
    Left = 6
    Top = 192
    Width = 523
    Height = 361
    DataSource = dsEtapaDetalheItem
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 11
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = dbgrdEtapaDetalheItemDblClick
    OnKeyDown = dbgrdEtapaDetalheItemKeyDown
    Columns = <
      item
        Expanded = False
        FieldName = 'IDMATERIAL'
        Title.Caption = 'C'#243'd. Material'
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ETPDETID'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'ETPID'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'EMPREENDID'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'MATDESCRICAO'
        Title.Caption = 'Nome Material'
        Width = 400
        Visible = True
      end>
  end
  object dbgrdEtapaDetalheServico: TDBGrid [24]
    Left = 544
    Top = 192
    Width = 523
    Height = 361
    DataSource = dsEtapaDetalheServico
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 12
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = dbgrdEtapaDetalheServicoDblClick
    OnKeyDown = dbgrdEtapaDetalheServicoKeyDown
    Columns = <
      item
        Expanded = False
        FieldName = 'EMPREENDID'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'ETPID'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'ETPDETID'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'ETPDETSERID'
        Title.Caption = 'C'#243'd. Servi'#231'o'
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ETPDETSERDESCRICAO'
        Title.Caption = 'Descri'#231#227'o do Servi'#231'o'
        Width = 400
        Visible = True
      end>
  end
  object Panel1: TPanel [25]
    Left = 544
    Top = 176
    Width = 521
    Height = 15
    Caption = 'Servi'#231'os'
    Color = clActiveCaption
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 13
  end
  object Panel2: TPanel [26]
    Left = 5
    Top = 176
    Width = 524
    Height = 15
    Caption = 'Materiais'
    Color = clActiveCaption
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 14
  end
  object Edit1: TEdit [27]
    Left = 152
    Top = 56
    Width = 417
    Height = 21
    Color = clSilver
    ParentShowHint = False
    ReadOnly = True
    ShowHint = False
    TabOrder = 15
  end
  object Edit2: TEdit [28]
    Left = 712
    Top = 56
    Width = 345
    Height = 21
    Color = clSilver
    ParentShowHint = False
    ReadOnly = True
    ShowHint = False
    TabOrder = 16
  end
  inherited qFilha: TQuery
    AfterScroll = qFilhaAfterScroll
    SQL.Strings = (
      'SELECT * FROM ETAPAEMPREENDIMENTODETALHE'
      'WHERE 1 = -1')
    object qFilhaETPDETDATAPREVISTATERMINO: TDateTimeField
      FieldName = 'ETPDETDATAPREVISTATERMINO'
      Origin = 
        '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.ETPDETDATAPREVISTATER' +
        'MINO'
    end
    object qFilhaETPDETDATAPREVISTAINICO: TDateTimeField
      FieldName = 'ETPDETDATAPREVISTAINICO'
      Origin = 
        '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.ETPDETDATAPREVISTAINI' +
        'CO'
    end
    object qFilhaETPDETDATATERMINO: TDateTimeField
      FieldName = 'ETPDETDATATERMINO'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.ETPDETDATATERMINO'
    end
    object qFilhaETPDETDATAINICIO: TDateTimeField
      FieldName = 'ETPDETDATAINICIO'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.ETPDETDATAINICIO'
    end
    object qFilhaETPDETID: TIntegerField
      FieldName = 'ETPDETID'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.ETPDETID'
    end
    object qFilhaETPDETDESCRICAO: TStringField
      FieldName = 'ETPDETDESCRICAO'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.ETPDETDESCRICAO'
      Size = 100
    end
    object qFilhaETPID: TIntegerField
      FieldName = 'ETPID'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.ETPID'
    end
    object qFilhaEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".ETAPAEMPREENDIMENTODETALHE.EMPREENDID'
    end
  end
  inherited qGenerica: TQuery
    Left = 452
    Top = 3
  end
  object ds1: TDataSource
    DataSet = qFilha
    Left = 384
    Top = 8
  end
  object dsEtapaDetalheItem: TDataSource
    DataSet = QEtapaDetalheMaterial
    Left = 94
    Top = 432
  end
  object dsEtapaDetalheServico: TDataSource
    DataSet = QEtapaDetalheServico
    Left = 672
    Top = 376
  end
  object QEtapaDetalheMaterial: TQuery
    DatabaseName = 'BDSistema.FDB'
    SQL.Strings = (
      
        'SELECT EM.*, M.MATDESCRICAO FROM ETAPADETALHEMATERIAL EM, MATERI' +
        'AIS M'
      'WHERE 1=-1'
      'AND EM.IDMATERIAL = M.IDMATERIAL')
    Left = 126
    Top = 432
    object intgrfldQEtapaDetalheMaterialIDMATERIAL: TIntegerField
      FieldName = 'IDMATERIAL'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHEMATERIAL.IDMATERIAL'
    end
    object intgrfldQEtapaDetalheMaterialETPDETID: TIntegerField
      FieldName = 'ETPDETID'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHEMATERIAL.ETPDETID'
    end
    object intgrfldQEtapaDetalheMaterialETPID: TIntegerField
      FieldName = 'ETPID'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHEMATERIAL.ETPID'
    end
    object intgrfldQEtapaDetalheMaterialEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHEMATERIAL.EMPREENDID'
    end
    object strngfldQEtapaDetalheMaterialMATDESCRICAO: TStringField
      FieldName = 'MATDESCRICAO'
      Origin = '"BDSISTEMA.FDB".MATERIAIS.MATDESCRICAO'
      Size = 100
    end
  end
  object QEtapaDetalheServico: TQuery
    DatabaseName = 'BDSistema.FDB'
    SQL.Strings = (
      'SELECT * FROM ETAPADETALHESERVICO'
      'WHERE 1=-1')
    Left = 712
    Top = 368
    object QEtapaDetalheServicoETPDETSERDESCRICAO: TStringField
      FieldName = 'ETPDETSERDESCRICAO'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHESERVICO.ETPDETSERDESCRICAO'
      Size = 100
    end
    object QEtapaDetalheServicoETPDETID: TIntegerField
      FieldName = 'ETPDETID'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHESERVICO.ETPDETID'
    end
    object QEtapaDetalheServicoEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHESERVICO.EMPREENDID'
    end
    object QEtapaDetalheServicoETPID: TIntegerField
      FieldName = 'ETPID'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHESERVICO.ETPID'
    end
    object QEtapaDetalheServicoETPDETSERID: TIntegerField
      FieldName = 'ETPDETSERID'
      Origin = '"BDSISTEMA.FDB".ETAPADETALHESERVICO.ETPDETSERID'
    end
  end
end
